home *** CD-ROM | disk | FTP | other *** search
/ Ham Radio 2000 / Ham Radio 2000.iso / ham2000 / misc / pspic54 / eval.inf < prev    next >
INI File  |  1993-08-10  |  10KB  |  362 lines
  1. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  2. ;;
  3. ;; Purpose
  4. ;;   Installation script for MicroSim Design Center
  5. ;;   Evaluation Version under Windows 3.0
  6. ;;
  7. ;; Returned value
  8. ;;
  9. ;; Discussion
  10. ;;   Uses Instalit for Windows, by HPI
  11. ;;
  12. ;; Author
  13. ;;   kws - 07 Feb 92 - created
  14. ;;   kws - 15 Jul 92 - version numbers (52 and 5.2) in directory 
  15. ;;
  16. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  17. do initializeInstall
  18.  
  19. [pointSTART]
  20. getMenuChoice
  21.   Install Design Center Evaluation Version.
  22.   Copy one file from the installation disks.
  23.   Exit Installation program.
  24. endGetMenuChoice
  25.  
  26. inCase choice is
  27.   =1: queAllFiles
  28.       [number1] := 1
  29.   =2: [number1] := 2
  30.       do copyOneFile
  31.   =3: do exitInstall 
  32. endInCase
  33.  
  34. [pointGETDIRECTORY]
  35.  
  36. ;; Check for hard disk A: (NEC) or C:
  37. if driveIsPresent A
  38.   if driveIsRemoveable A
  39.     determineInstallationDirectory C:\MSIMEV54 requireFixed noCreate
  40.   else
  41.     determineInstallationDirectory A:\MSIMEV54 requireFixed noCreate
  42.   endif
  43. else
  44.   determineInstallationDirectory requireFixed noCreate
  45. endif
  46.  
  47. if directoryExists [installationDirectory]
  48.   dialog [yesOrNo1] useHeader "Delete Existing Files"
  49.     The directory [installationDirectory] already exists.
  50.  
  51.     Select 'Yes' to copy new files to this directory,
  52.     overwriting files of the same name, like PSCHED.EXE, etc.
  53.     Select 'No' to specify a different installation directory.
  54.  
  55.   endDialog
  56.  
  57.   if [yesOrNo1] = n 
  58.     goto [pointGETDIRECTORY]
  59.   endif
  60. endIf
  61.  
  62. if [number1] = 1                       
  63.   ;; [number1] always set to installation menu choice (1 == full install)
  64.   if freeSpaceOnDrive installationDrive < queSize 
  65.     dialog [yesOrNo1] useHeader "Installation Error"
  66.       Insufficient space on this disk drive, need at least
  67.       queSize bytes.  Do you wish to select another drive?
  68.     endDialog
  69.     if [yesOrNo1] = y 
  70.       goto [pointGETDIRECTORY]
  71.     else 
  72.       do abortInstall
  73.     endif
  74.   endif
  75. endif  
  76.  
  77. if [number1] = 1
  78.   ;; get readme.* and *.by uncompressed files
  79.   copyFiles
  80.     readme.*
  81.     *.by
  82.     msim.ini
  83.   endCopyFiles
  84.  
  85.   createDirectoryIfNecessary [installationDirectory]\BACKUP
  86.  
  87. endif
  88.  
  89. ;; copy all user selected files now
  90. getQuedFiles onePerLine noInsertionPrompt
  91.  
  92. setCompletionStatusTo finished
  93.  
  94. ;; install program groups if in Windows and doing a full install
  95. if Windows
  96.   if [number1] = 1
  97.     dialog [yesOrNo1] useHeader "Design Center 5.4 Group"
  98.       Do you want to create a Design Center group with
  99.       icons for the programs (PSpice, Probe, etc.)?
  100.     endDialog
  101.  
  102.     if [yesOrNo1] = y
  103.       buildProgramGroup "Design Center Eval 5.4" MSIMEV54.GRP replace
  104.         [installationDirectory]\psched.exe  "Schematics"      [installationDirectory]\psched.exe
  105.         [installationDirectory]\wpspice.exe "PSpice"          [installationDirectory]\wpspice.exe
  106.         [installationDirectory]\probe.exe   "Probe"           [installationDirectory]\probe.exe
  107.         [installationDirectory]\stmed.exe   "Stimulus Editor" [windowsDirectory]\progman.exe
  108.         [installationDirectory]\parts.exe   "Parts"           [windowsDirectory]\progman.exe
  109.       endBuildProgramGroup
  110.     endif
  111.   endif
  112.  
  113.   if protectedMode
  114.   else
  115.     dialog useHeader "Installation Warning"
  116.       You are currently running in real mode.
  117.       The MicroSim Design Center requires
  118.       Windows to be run in protected mode.
  119.     endDialog
  120.   endif
  121. endif
  122.  
  123. ;; noSysFileConfirmation
  124.  
  125. if [number1] = 1
  126.   dialog [yesOrNo1] useHeader "Modify AUTOEXEC.BAT?"
  127.     Do you want the Design Center directory added to your
  128.     path in the AUTOEXEC.BAT file?  (This must be done for 
  129.     the Design Center to execute properly)
  130.   endDialog
  131.   if [yesOrNo1] = y
  132.     modifyAutoexecBat
  133.       addPathComponent [installationDirectory] at beginning
  134.     endModifyAutoexecBat
  135.   endif
  136.  
  137.   ;; install msim.ini in Windows directory, modify LIBPATH and BACKUP
  138.   if Windows
  139. [pointMSIMINI]
  140.     if fileExists [windowsDirectory]\msim.ini
  141.       [string3] := MSIM.BAK
  142.       dialog [string3] useHeader "Modifying MSIM.INI"
  143.         The MSIM.INI file is about to be installed in the
  144.         Windows directory, however a previous version of MSIM.INI 
  145.         has been detected. Please enter a backup file name for
  146.         the previous version of MSIM.INI to be saved as: 
  147.       endDialog  
  148.     endif
  149.   
  150.     if [string3] = blankString
  151.     else
  152.       if fileExists [windowsDirectory]\[string3]
  153.         dialog [yesOrNo1] useHeader "Modifying MSIM.INI"
  154.           The file [windowsDirectory]\[string3] already exists.
  155.           Do you want to write over it?
  156.         endDialog
  157.         if [yesOrNo1] = n
  158.           goto [pointMSIMINI]
  159.         else
  160.           deleteFiles from [windowsDirectory]
  161.             [string3]
  162.           endDeleteFiles
  163.         endif
  164.       endif
  165.       renameFile [windowsDirectory]\msim.ini to [string3]
  166.     endif
  167.   
  168.     copyFiles from [installationDirectory] to [windowsDirectory]
  169.       msim.ini
  170.     endCopyFiles
  171.   
  172.     deleteFiles from [installationDirectory]
  173.       msim.ini
  174.     endDeleteFiles
  175.   
  176.     [array1][1] := MICROSIM
  177.     [array1][2] := LIBPATH
  178.     [array1][3] := [installationDirectory]\LIB;[installationDirectory]\EXAMPLES
  179.     [array1][4] := [windowsDirectory]\MSIM.INI
  180.     writePrivateProfileString using [array1]
  181.   
  182.     [array1][1] := SCHEMATICS
  183.     [array1][2] := BACKUP
  184.     [array1][3] := [installationDirectory]\BACKUP
  185.     [array1][4] := [windowsDirectory]\MSIM.INI
  186.     writePrivateProfileString using [array1]
  187.  
  188.   endif  ;; if windows
  189. endif  ;; if [number1] = 1
  190.  
  191. if [number1] = 1
  192.   dialog [yesOrNo1] useHeader "Run SETUPDEV.EXE"
  193.     Do you want to run the DOS SETUPDEV.EXE program to 
  194.     create a PSPICE.DEV file that sets up the monitor and 
  195.     printer for the DOS programs PARTS.EXE and STMED.EXE?
  196.   endDialog
  197.   if [yesOrNo1] = y
  198.     run  [installationDirectory]\setupdev.exe -d [installationDirectory]\pspice.dev
  199.   endif  
  200.  
  201.   ;; [number1] always set to installation menu choice (1 == full install)
  202.   dialog useHeader "Design Center Installation"
  203.     Your Evaluation Design Center installation is now complete.
  204.     You must reboot the computer for changes to your AUTOEXEC.BAT,
  205.     CONFIG.SYS, and/or Windows *.INI files to take effect.  
  206.  
  207.     Please use Notepad to view the README.DOC file.
  208.  
  209.   endDialog
  210. else
  211.   dialog useHeader "Partial Installation"
  212.     Your partial installation is now complete.
  213.   endDialog
  214.   goto [pointSTART]
  215. endif
  216.  
  217. soLong                                 ;; exit installation pgm
  218.  
  219.  
  220.  
  221. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  222. ;;
  223. ;; Purpose
  224. ;;   Allow user to copy one file from compressed disks.
  225. ;;
  226. ;; Returned value
  227. ;;
  228. ;; Discussion
  229. ;;   File is only put in queue, must still be a 'getQuedFiles' call
  230. ;;
  231. ;; Author
  232. ;;   kws - 03 Dec 90 - created
  233. ;;
  234. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  235. procedure copyOneFile
  236. [pointCOPYFILE]
  237.   dialog [string1] useHeader "Extracting a file from installation Disks"
  238.     Please enter the name of the file you wish to copy
  239.     from the installation disks (press ENTER to exit):
  240.   endDialog
  241.  
  242.   if [string1] = blankString
  243.     exit
  244.   endif
  245.  
  246.   if [string1] contains \
  247.     popup Please enter just the file name with no path.
  248.     goto [pointCOPYFILE]
  249.   endif
  250.  
  251.   if lengthOf [string1] > 12
  252.     popup The file name is too long.
  253.     goto [pointCOPYFILE]
  254.   endif
  255.  
  256.   if fileIsInLibrary [string1]
  257.   else
  258.     popup Can't find that file name on the installation disks.
  259.     goto [pointCOPYFILE]
  260.   endif
  261.  
  262.   queFiles
  263.     [string1]
  264.   endQueFiles
  265.  
  266. endProcedure
  267.  
  268.  
  269.  
  270. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  271. ;;
  272. ;; Purpose
  273. ;;   Initialize windows at start of install
  274. ;;
  275. ;; Returned value
  276. ;;
  277. ;; Discussion
  278. ;;
  279. ;; Author
  280. ;;   kws - 03 Dec 90 - created
  281. ;;
  282. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  283. procedure initializeInstall
  284.   setTopLineTo MicroSim Design Center Installation (ESC to quit)
  285.  
  286.   setBackdrop off
  287.   setDefaultBitmap off
  288.  
  289.   if windows
  290.     setAttentionAttrTo blackOnWhite
  291.     setScreenAttrTo blackOnWhite
  292.     setBackgroundColor 192 192 192 192 192 192
  293.     setDithering off
  294.   endif
  295.  
  296.   showWindow maximize
  297.   clearScreen
  298.  
  299.   setSupportInformation
  300.     For assistance please call the MicroSim Product
  301.     Support Group or the MicroSim Technical Support
  302.     group at (714) 837-0790
  303.  
  304.     MicroSim Corporation
  305.     20 Fairbanks
  306.     Irvine, CA   92718
  307.  
  308.     Fax: (714) 455-0554
  309.   endSetSupportInformation
  310.  
  311. endProcedure
  312.  
  313.  
  314.  
  315. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  316. ;;
  317. ;; Purpose
  318. ;;   Abort installation
  319. ;;
  320. ;; Returned value
  321. ;;
  322. ;; Discussion
  323. ;;   Put any cleanup funcs here.
  324. ;;
  325. ;; Author
  326. ;;   kws - 03 Dec 90 - created
  327. ;;
  328. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  329. procedure abortInstall
  330.   popup Evaluation Design Center installation aborted.
  331.   soLong
  332. endProcedure
  333.  
  334.  
  335.  
  336. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  337. ;;
  338. ;; Purpose
  339. ;;   Exit installation
  340. ;;
  341. ;; Returned value
  342. ;;
  343. ;; Discussion
  344. ;;   Put any cleanup funcs here.
  345. ;;
  346. ;; Author
  347. ;;   kws - 03 Dec 90 - created
  348. ;;
  349. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  350. procedure exitInstall
  351.   soLong
  352. endProcedure
  353.  
  354.  
  355.  
  356. endScript
  357.  
  358.  
  359.  
  360.  
  361.  
  362.